home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1988 March / 1988-03.d64 / colorlister 64 (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  632b  |  16 lines
  1. 10 rem copyright 1988 compute! publications, inc. - all rights reserved
  2. 20 print"[147]   copyright 1988 compute! pub., inc."
  3. 30 printtab(10)"all rights reserved"
  4. 40 fori=828to916:reada:pokei,a:x=x+a:next
  5. 50 ifx<>11017thenprint"error in data statements.":stop
  6. 55 ifx=11017thenprint"color lister installed."
  7. 60 data 169,75,141,6,3,169,3,141,7,3
  8. 70 data 169,0,133,251,96,8,133,252,132,253
  9. 80 data 134,254,173,141,2,208,251,165,251,208
  10. 90 data 12,165,252,201,143,208,42,169,1,133
  11. 100 data 251,208,36,165,252,201,49,144,26,201
  12. 110 data 57,144,14,201,65,144,18,201,73,176
  13. 120 data 14,41,15,105,7,208,5,56,41,15
  14. 130 data 233,1,141,134,2,169,0,133,251,166
  15. 140 data 254,164,253,165,252,40,76,26,167
  16.